﻿<!--#include file="const.inc"-->
<%
'====================================================================
' 感谢使用晴天3G智能建站系统..
' 作者:梁永强.QQ:766750857
' 官方网址:wap.qt3g.com
' 声明:软件版权归作者所有,没有经过作者本人同意不得非法破解和传播本程序
'====================================================================
%>
<card title="我的药品">
<p>
<%
dim myid
myid=qingtian.nid
set rs=Server.CreateObject("ADODB.Recordset")
strsQL="select y1,y2,y3,y4,y5 from wupin where cstr(ids)='"&myid& "'"
rs.open strsQL,liao,1,2
if rs.recordcount<1 then
rs.addnew
rs("ids")=myid
rs.update
end if
Response.Write "百草丹:(" & rs("y1") &"颗)<br/><a href='sy.asp?wpid=y1&amp;cc="&cc&"&amp;ve="&ve&"'>使用</a>|<a href='song.asp?wpid=y1&amp;cc="&cc&"&amp;ve="&ve&"'>送人</a>|<a href='mai.asp?wpid=y1&amp;cc="&cc&"&amp;ve="&ve&"'>出售</a><br/>"
Response.Write "大力神丹:(" & rs("y2") &"颗)<br/><a href='sy.asp?wpid=y2&amp;cc="&cc&"&amp;ve="&ve&"'>使用</a>|<a href='song.asp?wpid=y2&amp;cc="&cc&"&amp;ve="&ve&"'>送人</a>|<a href='mai.asp?wpid=y2&amp;cc="&cc&"&amp;ve="&ve&"'>出售</a><br/>"
Response.Write "九转还魂丹:(" & rs("y3") &"颗)<br/><a href='sy.asp?wpid=y3&amp;cc="&cc&"&amp;ve="&ve&"'>使用</a>|<a href='song.asp?wpid=y3&amp;cc="&cc&"&amp;ve="&ve&"'>送人</a>|<a href='mai.asp?wpid=y3&amp;cc="&cc&"&amp;ve="&ve&"'>出售</a><br/>"
Response.Write "少林大还丹:(" & rs("y4") &"颗)<br/><a href='sy.asp?wpid=y4&amp;cc="&cc&"&amp;ve="&ve&"'>使用</a>|<a href='song.asp?wpid=y4&amp;cc="&cc&"&amp;ve="&ve&"'>送人</a>|<a href='mai.asp?wpid=y4&amp;cc="&cc&"&amp;ve="&ve&"'>出售</a><br/>"
Response.Write "江湖强力魔水:(" & rs("y5") &"颗)<br/><a href='sy.asp?wpid=y5&amp;cc="&cc&"&amp;ve="&ve&"'>使用</a>|<a href='song.asp?wpid=y5&amp;cc="&cc&"&amp;ve="&ve&"'>送人</a>|<a href='mai.asp?wpid=y5&amp;cc="&cc&"&amp;ve="&ve&"'>出售</a><br/>"
Response.Write "=========<br/>"
        rs.Close
	Set rs=Nothing

%>
<a href="index.asp?cc=<%=cc%>&amp;ve=<%=ve%>">[江湖首页]</a><br/>
<%qingtian.shuchu%>